Top 10k strings from Spectrum Computing - Issue 16 (1985)(ASP Software).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
9 ;" Press any key to contin"
8
8
6 nudges=nudges-1
5 ;" - = 20p";
4 INSTRUCTIONS.
4 ADDR=65070
4 ;"START THE TAPE":
4 ;"************************";
4 ;"*******"
4 ;"* *";
4 ;" STOP THE TAPE "
4 ;" = 50p";
4 ;" PRESS ANY KEY TO TURN PAGE "
4 ;" ";
4 ;" "
4
3 a$(d1+d2)="
3 FRAME=FRAME+1
3 ;"STOP THE TAPE"
3 ;" "
2 y=y+(z$="z"
2 x=x+(z$="p"
2 n$="Nothing"
2 l$="Press any key to continue. Press any key to contin":
2 fruit
2 ;"SCREEN ";sc
2 ;"CDCDO_O_
2 ;"************************"
2 ;"********************";
2 ;" START THE TAPE "
2 ;" PRESS ANY KEY TO TURN THE PAGE ":
2 ;" ";:
2 ;" ";
2 ;" ";
2 ,X1;" ":
1 zX?{ZI{Pardon?
1 you=you+count
1 x,y-p;"GLUG"
1 update 10P'S & TURNS
1 towin>MAXSCORE
1 toad
1 title screen
1 thisscore=thisscore+1
1 thisscore=0
1 thisscore<towin
1 tens=tens-1
1 tens=tens+1
1 start the tape
1 simeon
1 simcode
1 set up & variables
1 select option
1 score=score+thisscore:
1 save tape routine
1 review2 8
1 review1
1 random place in reel
1 ramtop=65367
1 r=(j$(y+p)="
1 r=(i$(y+p)="
1 r=(h$(y+p)="
1 r=(g$(y+p)="
1 r=(f$(y+p)="
1 r=(e$(y+p)="
1 r=(d$(y+p)="
1 r=(c$(y+p)="
1 r=(b$(y+p)="
1 r=(a$(y+p)="
1 print up screen
1 print up reels
1 print up fruit
1 patterns
1 patcode
1 p;"................................"
1 p;" TIME OUT ":
1 oy=y+(z$="z")-(z$="a"):
1 ox=x+(z$="p")-(z$="o"):
1 out of money screen
1 oranges & lemons tune
1 o,o;" Press any key to play again or ":
1 o,o;" LIVES ";l$;" ";
1 nudges routine
1 n$="Nothing":
1 n$="2 times":
1 n$="2 times"
1 n$="1 times":
1 n$="1 times"
1 menu screen
1 me=me+count
1 m$="8 times":
1 m$="4 times":
1 m$="2 times":
1 load screen ls
1 l$="Press any key to continue. Press any key to contin"
1 k$="+++CONGRATULATIONS!+++":
1 jHklCDCgkl
1 invcode2
1 invcode1 4
1 invaders
1 instructions screens
1 hooter S
1 hold routine
1 happy tune
1 hall of fame screen
1 hack 7
1 goes=goes+1
1 gamble routine
1 enter high score
1 dice
1 data for udg's etc.
1 data for big chars
1 d(f)=d(f-1
1 d$(f)=d$(f-1
1 cover#15
1 count=count+x*(a$(x)
1 compute score
1 clear reel
1 check if win or not
1 border of fruit
1 bonus=bonus/2
1 bonus=bonus*2
1 b$="789:":
1 b$="3456":
1 b$="0122":
1 b$=",-./":
1 b$="()*+":
1 b$="$%&'":
1 aggregate dice
1 add on winnings if any
1 a$="123456789
1 a$=" Twenty tons. Collect the rings through twenty screens , but avoid the 20 ton weights and the 'eaters'...................... Press a key to start. "
1 a$(f,r(f)+g)="7"
1 a$(f,r(f)+g)="6"
1 a$(f,r(f)+g)="5"
1 a$(f,r(f)+g)="4"
1 a$(f,r(f)+g)="3"
1 a$(f,r(f)+g)="2"
1 a$(f,r(f)+g)="1"
1 `c(&$"f 8642f.,*jbd0hbd08t
1 ````````````
1 YOU WILL HEAR THE 'WIN' SIGNAL."
1 Y=Y+((Z$="6"
1 X=X+((Z$="8"
1 WILL REPEAT THE FIRST SIGNAL ANDADD A NEW ONE.YOU MUST THEN
1 WILL HEAR THE 'LOSE' SIGNAL."
1 WHICH WILL PLAY BACK THE LONGESTSEQUENCE SO FAR."
1 WELL-KNOWN GAME OF A SIMILAR
1 Table used:
1 Table size:
1 TO BE REPEATED DEPENDS ON THE
1 THEIR CORRECT SEQUENCE."
1 Start tape..
1 SIMEON
1 SIGNALS ON A'KNOCKOUT' BASIS."
1 SIGNALS CORRECTLY,SIMEON WILL
1 SIGNALS (LEVEL 3) OR 31 SIGNALS
1 SEQUENCE EXACTLY OR BY TAKING
1 SEQLEN=SEQLEN+1
1 SELECT LEVEL
1 SCORE WHICH YOU CAN COMPARE WITHYOUR BEST SCORE BY PRESSING 'H'
1 SCORE ..... HI ..... LIVES
1 SAVE SCREEN
1 REPLAY LAST SEQUENCE
1 REPEATING THE SEQUENCE OF
1 REPEAT THESE TWO SIGNALS IN
1 REPEAT THE NUMBER OF SIGNALS FORA GIVEN LEVEL,YOU HAVE WON AND
1 REPEAT THE FIRST TWO SIGNALS ANDADD A NEW ONE ETC."
1 Print numbers in boxes
1 Pass 2 errors:
1 PROCEEDS AS DESCRIBED EXCEPT
1 PRINT PAGE TWO OF
1 PRINT PAGE THREE OF
1 PRINT PAGE ONE OF
1 PRINT PAGE FOUR OF
1 PRINT "PRESS ANY KEY TOCONTINUE
1 PRESSING ONE OF FOUR KEYS:'1'
1 POKE CAPS LOCK
1 PLAYERS PROCEED BY TAKING TURNS
1 PLAYBACK LONGEST SEQUENCE
1 PLAYBACK CURRENT SEQUENCE
1 PLAY,PRESS 'S' TO START THE
1 PATTERN GENERATOR PETE COOKE APRIL 85
1 PATTERN DISPLAY";
1 No Table space!
1 NOOFSHAPES=NOOFSHAPES+1
1 NOOFSHAPES=0
1 NAME,FOR THE 48K SPECTRUM.
1 MAXSCORE=MAXSCORE+1
1 MAXSCORE=0
1 MAIN GAME LOOP
1 LONGEST=SEQLEN
1 LONGER THAN SIX SECONDS TO PRESSA 'SIGNAL' KEY.IN THIS CASE,YOU
1 LOAD SCREEN
1 LEVEL=LEVEL+1
1 LEVEL OF PLAY.THIS ALLOWS YOU TOSELECT A GAME OF 8 SIGNALS (LEV-EL 1),14 SIGNALS (LEVEL 2),20
1 L(NOOFSHAPES):
1 KEY IN PLAYERS SEQUENCE
1 Interrupted
1 Human's go
1 H(NOOFSHApES):
1 GREEN AND 'Z' FOR BLUE.SIMEON
1 GET KEYPRESS WITHIN SIX SECONDS
1 GENS20T
1 GAME.YOU WILL BE GIVEN THE FIRST"
1 FRAME>MAXFRAME
1 FRAME=FRAME-(1
1 FOR RED,'0' FOR YELLOW,'M' FOR
1 Executes:
1 End of human's go
1 End of computer's go
1 ERROR IN INPUT
1 Dice throw
1 DRAW TITLE
1 DESIGN SCREEN
1 DECEMBER 1984
1 Computer's go
1 Check for win
1 CONSTRUCT DISPLAY
1 Buffer size?
1 Bad Memory!
1 BY DECIDING WHO GOES FIRST.PLAY
1 BY CHRIS HOWARD STONE
1 ADDR=65145
1 ADDR=65120
1 ADDR=65095
1 ADDR,APEEK:
1 ADDR,APEEK+128
1 A(SEQLEN)=COL
1 @@@@@@@@
1 =X-2X)=X-256
1 <``~<ffffff<00<0006
1 <,$$4< <,$$$$4<rRBBBBJN
1 ;maxscore;
1 ;ls;" ";#1
1 ;f;l$;" ";
1 ;d$(f);" ";:
1 ;FRAME;" "
1 ;;"************************"
1 ;"yourself a place on the";
1 ;"your own use in other programs, without being required to pro- nounce a single mnemonic. After using the digitless in- teractive hooter customiser to "
1 ;"you win enough to credit";
1 ;"use them. When they are";
1 ;"stay yellow for a while."
1 ;"space 1 ";
1 ;"routines. Please use the";
1 ;"on the FRUIT MACHINE?";
1 ;"now. (Max. 10 letters)";
1 ;"in the ""HALL of FAME"".";
1 ;"hiWXINEF
1 ;"hiWXABEFWX
1 ;"held down they beep and";
1 ;"go costs you 10p. Will";
1 ;"following keys in play:-"
1 ;"flash from their normal";
1 ;"enough to be ";l;l$;" place";
1 ;"design screen keys a/z o/p";
1 ;"colour to yellow you can";
1 ;"as bells and bars plus";
1 ;"all normal fruit as well";
1 ;"a nudge you NUDGE UP,";
1 ;"Z ... Right";
1 ;"You start with `1. Each";
1 ;"You have survived long";
1 ;"YOU CAN LOSE BY NOT REPEATING A
1 ;"When any of these keys";
1 ;"This program simulates the"'"lights often found in disco's"'"and allows you to design a"'"sequence of patterns of"'"lights."
1 ;"The winner is the player who covers the last number."
1 ;"The board consists of a grid of nine numbers. The aim of the game is to cover the numbers on the board with coins (
1 ;"TWO OR MORE PLAYERS MAY COMPETE
1 ;"Speed : ";
1 ;"Screen ";ls;" ";
1 ;"Score greater than 45:";p$;" lost."
1 ;"STILL LOADING....":
1 ;"START. During a win you";
1 ;"START TAPE."
1 ;"START TAPE":
1 ;"SPEED ";SPEED
1 ;"SIMEON IS A SIMULATION OF THAT
1 ;"SCORE ";s;" ";
1 ;"SCORE ";s;
1 ;"SAVE>TAPE"
1 ;"Q=QUIT";
1 ;"Q-QUIT N-NEXT B-BACKUP R-REPEAT";
1 ;"Press any key to roll the dice"
1 ;"Please wait.":
1 ;"Please place start pos (s) and end pos (e)."
1 ;"Please enter your name";
1 ;"PRESS SPACE";
1 ;"PRESS ANY KEY TO CONTINUE"
1 ;"PRESS 1 - 5"
1 ;"PRESS 'R' TO READ AGAIN ";
1 ;"PLEASE WAIT":
1 ;"PATTERN DISPLAY";
1 ;"OR PRESS 'C' TO CONTINUE":
1 ;"OLD SPEED ";SPEED;
1 ;"OLD NO.FRAMES ";MAXFRAME
1 ;"Nothing"
1 ;"NUDGES:"
1 ;"NUDGE DOWN or CANCEL."
1 ;"NO OF FRAMES ";MAXFRAME
1 ;"Loading Code";
1 ;"Loading ...";
1 ;"LOADING....":
1 ;"LOAD<TAPE"
1 ;"LEVEL";:
1 ;"L for Load next program"
1 ;"INSTRUCTIONS"
1 ;"INK ";INK
1 ;"How long can you survive";
1 ;"Hackers Hangout"
1 ;"HI ";hs;
1 ;"HALL of FAME survivors?"
1 ;"GAMBLE:"
1 ;"GAMBLE, HOLDS and NUDGES";
1 ;"GAMBLE or COLLECT.";
1 ;"FRUIT MACHINE features";
1 ;"FRUIT MACHINE
1 ;"F-FILL C-CLEAR";
1 ;"During a normal turn you";
1 ;"During a hold you HOLD,";
1 ;"Controls...";
1 ;"Caps shift ... Left";
1 ;"CURSORS (+S-SHIFT=FLIP BIT)";
1 ;"CLEAR PATTERNS";
1 ;"CANCEL or START. During";
1 ;"BRIGHT ";BRIGHT
1 ;"B - Space ... Fire";
1 ;"Any line or";
1 ;"ASSUMING YOU REPEAT THESE TWO
1 ;"ARE YOU SURE? (Y/N)"
1 ;"ALTER SPEED/NO.OF FRAMES"
1 ;"ALTER COLOURS"
1 ;"A player's go continues until he is unable to cover any numbers with one throw of the dice. At this point the value ofthe uncovered numbers is added to the player's score. If this brings his score to 45 or over the player must retire."
1 ;"==>0<=="
1 ;"= start or collect";
1 ;"= nudge a reel up";
1 ;"= nudge a reel down";
1 ;"= hold a reel";
1 ;"= cancel or gamble";
1 ;"9. LOAD NEXT PROGRAM"
1 ;"8. CLEAR PATTERNS";
1 ;"8 times"
1 ;"7. LOAD<TAPE";
1 ;"6. SAVE>TAPE";
1 ;"5. ALTER SPEED/NO.OF FRAMES";
1 ;"5. VIEW SCREENS"
1 ;"4. INSTRUCTIONS";
1 ;"4. LOAD SCREENS < TAPE";
1 ;"4 times"
1 ;"3. ALTER COLOURS";
1 ;"3. SAVE SCREENS > TAPE";
1 ;"20 tons.";
1 ;"20 tons":
1 ;"2. ALTER SEQUENCE";
1 ;"2. DESIGN SCREEN";
1 ;"2 times"
1 ;"1. RUN";
1 ;"1. PLAY GAME";
1 ;"1 times"
1 ;"1 & 2 ... Stop game."
1 ;"********************"
1 ;"***************":
1 ;"** MAIN MENU **"
1 ;"(key q, w or e)"
1 ;"(key a, s or d)"
1 ;"(key 5)"
1 ;"(key 4)"
1 ;"(key 1, 2 or 3)"
1 ;" diagonal: ";
1 ;" ^4 ^5 "
1 ;" YOU CAN'T SWIM "
1 ;" THE WORLD IS FLAT "
1 ;" THE ALLIGATOR GOT YOU "
1 ;" STOP THE TAPE AND PRESS A KEY ":
1 ;" START THE TAPE ":
1 ;" SIMEON ":
1 ;" RAN OVER "
1 ;" Press 0 (fast) to 9 (slow) to select speed. Space to play.";
1 ;" Page ";a;" ENTER=Next SPACE=Back":
1 ;" PRESS C TO COPY TO ZX PRINTER"
1 ;" PAYMENTS:
1 ;" NEW HIGH SCORE "
1 ;" My go "
1 ;" Invaders. ";
1 ;" HI ";hs;
1 ;" Game Over ":
1 ;" C.COLUMBUS WAS WRONG "
1 ;" ALL OK."
1 ;" A TURTLE DUCKED YOU "
1 ;" A NEW HIGH SCORE "
1 ;" = `1 ";
1 ;" = 80p";
1 ;" 3 = Quit program ";
1 ;" 2 = Start game ";
1 ;" 1 = Instructions ";
1 ;" - = 50p";
1 ;" - = 40p";
1 ;" - - = 10p";
1 ;" 'Q' WILL LOAD NEXT PROGRAM"
1 ;" ";score+thisscore
1 ;" ^Q ^W ^E ";
1 ;" ^A ^S ^D ";
1 ;" ^1 ^2 ^3 ";
1 ;" To select next option press- "
1 ;" TOADY "
1 ;" TIME ";t;
1 ;" Do you wish to add the dice? (Y/N)"
1 ;" 010 "
1 ;" 000 "
1 ;" ** Saving ** Please wait.":
1 ;" Press any key to continue. "
1 ;" PRESS ANY KEY TO TURN PAGE ":
1 ;" PLACE A BLANK TAPE IN YOUR CASSETTE RECORDER "
1 ;" by Jason Smith ";
1 ;" WIZARD PRANG'S LITTLE BLACK BOX of MACHINE CODE WHEEZES (no soldering necessary)"
1 ;" Game over. ";p$;" won."
1 ;" ":
1 ;" SHUT THE BOX By W.J. Greenall "
1 ;" OUT OF TIME ":
1 ;" GAME OVER "
1 ;" "
1 ;" CRUSHED ";
1 ;" ";
1 ;" Your go "
1 ;" "''''''
1 ;" "
1 2Iq*)q#")q~
1 20tons
1 20tgra
1 20tcode
1 ......................................................
1 ,r,r,r,r,5
1 +(Z$="p")-(Z$="o")):
1 *WARNING*
1 *HISOFT GENS2 ASSEMBLER*
1 *(x$="4")-5
1 *(x$="3")-5
1 *(x$="2")-5
1 *(x$="1")-5
1 *(SEQLEN>9
1 *(SEQLEN>5
1 *(SEQLEN<6
1 *(SCREEN-1
1 )="435261347153264251624753143"
1 )="346235247316521534612514734"
1 )="243516143574261352326417524"
1 )-((Z$="7"
1 )-((Z$="5"
1 ) by throwing the appropriate numberswith the dice. There are two dice and the values thrown may be taken separately or added together."
1 (thisscore
1 (LEVEL)+" ":
1 (LEVEL 4).IF YOU SUCCESFULLY
1 ''''''''''" CHANGES CHANGES"
1 '" This magazine is composed of a number of programs that chain together, so that each one will LOAD the next when you are ready for it."
1 '" Some of the programs on the tape may not be suitable for use with microdrives. "
1 '" SPECTRUM COMPUTING - ISSUE 16 FUTURE SUMMERS 1985
1 '" Press ENTER to go to next page"'" Press SPACE to go back a page"
1 '" PRESS L TO LOAD THE NEXT FILE"''" Or any other to read again."
1 '" EXTRA BITS!"''" That's right folks, 2 extra programs on the end of sides one and two. Many readers write requesting for early back issues of the tape mag. So due to popular demand, we have taken a trip down olde memory bank lane to bring you a total of four extra programs from issues two and three"
1 '" Any particular program can be LOADed using its file name listed on the contents page, but to 'read' everything in the magazine, it is easier to use the chaining."
1 $$$$$$$$$$
1 #p;" PRESS ANY KEY TO START":
1 #p;" PRESS ENTER TO QUIT"
1 "your mate to clear blockages in"
1 "would like to clarify some"
1 "which is on the above list you"
1 "what is really intriguing about it is that it makes a big dif- ference where the line is put ina program."
1 "wander around the pipes getting"
1 "type 'R' to re-read"
1 "type 'L' to load next"
1 "treated as an educational tool"
1 "to be desired, but the game"
1 "to be accepted for publication:"
1 "thinking about buying a program"
1 "think about, submissions on the"
1 "things for new viewers."
1 "the pipes, while you keep an"
1 "the interface is attached, the keyboard will be ignored."
1 "the answer to that 64 dollar"
1 "the CODE format. You can then LOAD it into a dummy REM state- ment and SAVE that in the usual BASIC format. This may seem the long way around, but it is less trouble than deleting every linein this program except the REM, which is the only other way I know of to get it on its own."
1 "tape to the address at the "
1 "start on screen (1-20) ";ls:
1 "start of this section. Payment"
1 "software are very good indeed."
1 "should first play around with"
1 "save screen no(1-20) ";screen:
1 "reset the RAMTOP to the 16K fig-ure, one of the stripes has to be removed to get a steady dis- play. Why should a 48K machine that thinks it's a 16K machine run slower than when it knows ithas 48K? "
1 "quite good. The price is also"
1 "question is that they are."
1 "play. Overall this is a good"
1 "patterns"
1 "of actually slows up the action by sending the BASIC off lookingfor GOSUBs all the time. So if you're after speed, thenforget the style, just get the critical bits at the top of the list."
1 "o",o,p,r,r,r,r,p,o
1 "mini office to give you a feel"
1 "magazines. In this editorial I"
1 "machine code programming in the category of a black art for manycomputer users. Have no fear, for I am not a- bout to launch into a descrip- tion of the arcane virtues of indexed addressing or the like. Rather I would present you with"
1 "load screen (1-20)";ls:
1 "likely to be accepted."
1 "it takes too long to find the line, then a frame is missed. A 'PAUSE 1' statement keeps the stripes in step with the TV picture by waiting for a pulse from the same clock that is usedfor the video output, but if the"
1 "issue 16. I hope you caught the"
1 "is well balanced and fun to"
1 "is always on publication and is"
1 "invcode2"
1 "invcode1"
1 "invaders"
1 "interesting at 5.95 they seem a"
1 "intent on preventing your work"
1 "hoot code"
1 "happy to accept 16 or 48K progs"
1 "handled by simple SAVE and LOAD commands along with the rest of the program. But in order to getthe code out of this program without also recording all of the rest of the BASIC lines, we will have to SAVE the routine in"
1 "good buy. But are they any good"
1 "gets a match. Obviously, the nearer the line is to the begin-ning of the list, the quicker itwill be found."
1 "game of the same name. You are"
1 "for the subject and then choose"
1 "for inclusion in Spectrum Comp."
1 "for fairly simple tasks and if"
1 "following subjects are more"
1 "f",o,r,r,r,r,r,160
1 "eye open for the various nastys"
1 "each issue we will suggest some"
1 "dicated, which it does by start-ing at the beginning and lookingat every line number until it "
1 "create your own hoot, you will have an opportunity to save it on tape in easy to use form."
1 "between 20 and 100 pounds."
1 "at the end of this not-very-longprogram."
1 "article/program an even odder effect showed up which I cannot explain at all. I use a 48K Spectrum, but have to check thateverything will fit in 16K mach-ines. For some reason, when I "
1 "article in CRASH about tape "
1 "areas we are short of."
1 "arcade style game and worth the"
1 "arcade game written in machine"
1 "all your programs, letters etc."
1 "a spell already made up, in a little black box which I advise you not to open. You have it on board already. It's the siren routine which coincides with the'stop tape' message on each filein this magazine, but in this program you can customise it for"
1 "a foreman plumber who has to"
1 "a dedicated product."
1 "To contribute simply send your"
1 "This is a conversion of the C64"
1 "The subject is up to you but in"
1 "The manual with the programs is"
1 "The following are less likely"
1 "SPEED (0-100)";SPEED
1 "SIGNAL WHICH YOU MUST REPEAT BY
1 "SCORE TO FINISH (
1 "Review 2 Pipeline II"
1 "Press any key to play again, or Press enter to quit."
1 "Press C continue or Q quit ";y$
1 "NO OF FRAMES (TILL REPEAT) ";MAXFRAME
1 "NAME OF FILE ";F$
1 "My feeling is that if you are"
1 "Mini Office consists of 4 progs"
1 "MEGAPIG!","LOUISE","ROBDOG","CORRIE O.K","SCUM","WISEMAN","MR. BOYLE","MEATBALLS"
1 "Load screen ?(y/n) ";y$:
1 "INK+64*BRIGHT"
1 "INK COLOUR (1-7)";INK:
1 "I felt the graphics left a bit"
1 "Here are a few areas for you to"
1 "First, submissions, we welcome"
1 "BRIGHT (0-1) ";BRIGHT:
1 "BASIC is late getting there, it waits for the next pulse. So thestripes don't drift up and down,but are absent from every other frame. How about a demo?"
1 "Another point is that we are"
1 "All the programs are adequate"
1 "ALTER FROM FRAME?";FRAME
1 "8*MAXFRAME"
1 "28460+8*FRAME+N",
1 "20 tons which is a very good"
1 "(28460+8*FRAME+N-8)":
1 " you a fortune in 10p's."
1 " written by Pete Cook of Leics."
1 " what about this one ?."
1 " unusual and we hope you like it"
1 " should test your memory to the"
1 " lighting effects on your"
1 " Well the next program is quite"
1 " Welcome to Spectrum Computing"
1 " The rest of side 2 contains"
1 " Star game '20 tons'"
1 " Side 2 starts with Simeon and"
1 " SPECTRUM."
1 " Review 1 Mini Office":
1 " Press any key to turn the page "
1 " OK to save? (Y/N) ";Y$:
1 " Memory test 'simeon'"
1 " It's called 'patterns' and was"
1 " It allows you to create Disco"
1 " Invaders is just what it says."
1 " Fruit machine which should save"
1 " Fruit machine 'fruit'"
1 " Fruit is by Jason Smith from"
1 " Four 'reviews'"
1 " Enough of the future issues"
1 " Editorial 'cover'"
1 " Disco light show 'patterns'"
1 " Classic arcade 'invaders'"
1 " Caithness. It is a full feature"
1 " your Spectrum"
1 " You may hold a control down aslong as you wish, but after some50 hoots it will have worked itsway back to its original value. The numerals move the value in one direction and the letters inthe opposite."
1 " Useful utility programs"
1 " Unusual adventure games"
1 " This search time becomes crit-ical where the stripes are con- cerned because line 10 must be executed every 50th of a second if the stripes are to appear in every television frame, and if "
1 " This program line has some un-expected properties! "
1 " This is a version of a game which is familiar to most. We have modified it to accept inputfrom Kempston joystick or key- board. "
1 " There is more to this game than meets the eye. As with all dice games there is a large ele-ment of luck, but the chance of making strategic choices is alsothere."
1 " The stripes are now being pro-duced by line 9990, which is identical to line 10 except for its position. If there was one less stripe (one less BORDER statement) then the routine would still be flicker-free even"
1 " The striped border in this is-sue taught me a lot about speed-ing up the execution time of BASIC programs. The border is produced by line 10, and it's aninteresting trick in itself, but"
1 " The significance of all this is that the modular or structur-ed approach to programming that we are all supposed to approve"
1 " The reason for this is that whenever the BASIC comes across a GOTO or GOSUB or the like, it has to find the line number in-"
1 " The program will display this"'"sequence for up to 500 (16k)"'"or 4500 (48k) frames in an"'"endless loop."
1 " The keyboard controls are -- Q for UP - A for DOWN O for LEFT - P for RIGHT "
1 " The hooting code requires fourdifferent parameters. You can adjust these simply by listeningto the changing sound as you trythe controls. These are-"
1 " The easiest way to include a bit of machine code in a BASIC program is by using the old ZX81trick of placing the code in a REM statement. It can then be "
1 " The dummy REM line must be thefirst program line, so that we know the address for the USR call. It must have at least 72 characters in it, after the REM,so there will be room for the code. It should look something like this- "
1 " That's it for this issue, why not have a look at the listing?"
1 " That is not the end of it, ei-ther. While writing this very "
1 " Simple arcade games"
1 " Shut the box is an old board game involving dice.";
1 " Press any key for the instruc-tion page."
1 " Platform games"
1 " Note that once the text of thedummy REM has been replaced withmachine code, the Spectrum may refuse to LIST it, complaining of invalid colours, etc. This is okay, just use LIST 2 if you want to see the rest of the pro-gram."
1 " No. 1 - Press 1 or Q No. 2 - Press 2 or W No. 3 - Press 3 or E No. 4 - Press 4 or R "
1 " Magic, according to Larry Niv-en, is anything which you do notunderstand (anyone who does not know who Larry Niven is please leave this article now)! This definition would certainly put "
1 " Line 10 just hoots until a keyis pressed. Once you have typed in the above, ENTER LOAD"""" CODE and play the tape and you will have a complete hooter program to MERGE into other, less noisy routines."
1 " In fact, if this line was put at the end of a longish prog, itwould give a very different ef- fect. You still get the stripes,but they flicker. "
1 " Hints on how to get more from"
1 " First you need to SAVE the hoot CODE on tape, if you wish to keep it. You can select this as an option now, or return to the custom hoot bender, or go onto the next section of the maga-zine. Press a key-- "
1 " Do not attempt to connect the joystick interface to the com- puter while it is turned on. It is, however, okay to plug the joystick itself into the inter- face pack if the pack is alreadyconnected to the computer. If "
1 " Copies of current games"
1 " A real 16K Spectrum runs this routine at the same speed as a 48K Spectrum that only thinks itis a 16K model, so I have placeda CLEAR 32599 statement in the program to make it run in both."
1 " 10 PAUSE 1: IF INKEY$="""" THEN BORDER 7: BORDER 5: BORDER 4: BORDER 6: BORDER 3: BORDER 2: BORDER 5: GO TO 10 "
1 " S to SAVE hoot B to bend another hoot M for next part of magazine "
1 " 1 REM IT DOESN'T MATTER WHAT I TYPE AS LONG AS I USE AT LEASTSEVENTY-TWO CHARACTERS 10 RANDOMISE USR 23760:IF INKEY$ ="""" THEN GO TO 10 "
1 " Word processor"
1 " Spreadsheet"
1 " PRESS 'R' AND THE LAST SEQU-ENCE WILL BE RE-PLAYED.COUNT THENUMBER OF SIGNALS:THIS IS YOUR
1 " Graphics program"
1 " Database"
1 " 2 3 4"
1 " TOADY -- by R. Grainger "
1 " CONTENTS - SIDE TWO"
1 " CONTENTS - SIDE ONE"
1 " THE NUMBER OF SIGNALS
1 max) ";towin
1 main menu
1 SPECTRUM COMPUTING ";
1 Press a key to start. Twenty tons. Collect the rings through twenty screens , but avoid the 20 ton weights and the 'eaters'......................
1 P Cooke Oct 1984
1 Copyright HISOFT 1983
1 APS LTD 222 REGENT ST. LONDON WIR 7DB TELEPHONE 01-439 0666 EDITOR - ROY GIBSON"
1 5210 10
1 1985 Jason Smith"
1 ! "#$% &' ()*+, -./012>>:>>:6>>:2>>6>>:>>:6:6:>226:7=54A5A7=54?=539=4A5A7<7<A@6A<3AA:A>A7AA2A2227<2A>A7<7<A9A9<6>?<A547@>:9@>27<2A9@7@?<A227<355252235542552342525255252234BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC2>>2>:6:26:>>2>6:>>>6:>22>2>>:7=57=A7A>A<A9<A7<5A57<A@2A7=547<27<A7=A9<A?<A7<2A27<A9@A7<A:7@>7@A7<27<A52A?<2A27<A29A7@?<255254342345223522523452252552
1 All rights reserved
1 THE OBJECT OF THE GAME ISTO REPEAT CORRECTLY A LONGER ANDLONGER SEQUENCE OF SIGNALS.TO
1 @@@@@@@@
1 " Press ENTER when you wish to quit this section. "
1 20 TONS
1 w